home *** CD-ROM | disk | FTP | other *** search
/ Programming Windows (5th Edition) / Programming Windows, 5th ed. - Companion CD (097-0002183)(1999).iso / Chap06 / StokFont / StokFont.c next >
Encoding:
C/C++ Source or Header  |  1998-10-09  |  6.0 KB  |  170 lines
  1. /*-----------------------------------------
  2.    STOKFONT.C -- Stock Font Objects
  3.                  (c) Charles Petzold, 1998
  4.   -----------------------------------------*/
  5.  
  6. #include <windows.h>
  7.  
  8. LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ;
  9.  
  10. int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
  11.                     PSTR szCmdLine, int iCmdShow)
  12. {
  13.      static TCHAR szAppName[] = TEXT ("StokFont") ;
  14.      HWND         hwnd ;
  15.      MSG          msg ;
  16.      WNDCLASS     wndclass ;
  17.      
  18.      wndclass.style         = CS_HREDRAW | CS_VREDRAW ;
  19.      wndclass.lpfnWndProc   = WndProc ;
  20.      wndclass.cbClsExtra    = 0 ;
  21.      wndclass.cbWndExtra    = 0 ;
  22.      wndclass.hInstance     = hInstance ;
  23.      wndclass.hIcon         = LoadIcon (NULL, IDI_APPLICATION) ;
  24.      wndclass.hCursor       = LoadCursor (NULL, IDC_ARROW) ;
  25.      wndclass.hbrBackground = (HBRUSH) GetStockObject (WHITE_BRUSH) ;
  26.      wndclass.lpszMenuName  = NULL ;
  27.      wndclass.lpszClassName = szAppName ;
  28.      
  29.      if (!RegisterClass (&wndclass))
  30.      {
  31.           MessageBox (NULL, TEXT ("Program requires Windows NT!"), 
  32.                       szAppName, MB_ICONERROR) ;
  33.           return 0 ;
  34.      }
  35.      
  36.      hwnd = CreateWindow (szAppName, TEXT ("Stock Fonts"),
  37.                           WS_OVERLAPPEDWINDOW | WS_VSCROLL,
  38.                           CW_USEDEFAULT, CW_USEDEFAULT,
  39.                           CW_USEDEFAULT, CW_USEDEFAULT,
  40.                           NULL, NULL, hInstance, NULL) ;
  41.      
  42.      ShowWindow (hwnd, iCmdShow) ;
  43.      UpdateWindow (hwnd) ;
  44.      
  45.      while (GetMessage (&msg, NULL, 0, 0))
  46.      {
  47.           TranslateMessage (&msg) ;
  48.           DispatchMessage (&msg) ;
  49.      }
  50.      return msg.wParam ;
  51. }
  52.  
  53. LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
  54. {
  55.      static struct
  56.      {
  57.           int     idStockFont ;
  58.           TCHAR * szStockFont ;
  59.      }
  60.      stockfont [] = { OEM_FIXED_FONT,      TEXT ("OEM_FIXED_FONT"),
  61.                       ANSI_FIXED_FONT,     TEXT ("ANSI_FIXED_FONT"),    
  62.                       ANSI_VAR_FONT,       TEXT ("ANSI_VAR_FONT"),
  63.                       SYSTEM_FONT,         TEXT ("SYSTEM_FONT"),
  64.                       DEVICE_DEFAULT_FONT, TEXT ("DEVICE_DEFAULT_FONT"),
  65.                       SYSTEM_FIXED_FONT,   TEXT ("SYSTEM_FIXED_FONT"),
  66.                       DEFAULT_GUI_FONT,    TEXT ("DEFAULT_GUI_FONT") } ;
  67.  
  68.      static int  iFont, cFonts = sizeof stockfont / sizeof stockfont[0] ;
  69.      HDC         hdc ;
  70.      int         i, x, y, cxGrid, cyGrid ;
  71.      PAINTSTRUCT ps ;
  72.      TCHAR       szFaceName [LF_FACESIZE], szBuffer [LF_FACESIZE + 64] ;
  73.      TEXTMETRIC  tm ;
  74.      
  75.      switch (message)
  76.      {
  77.      case WM_CREATE:
  78.           SetScrollRange (hwnd, SB_VERT, 0, cFonts - 1, TRUE) ;
  79.           return 0 ;
  80.  
  81.      case WM_DISPLAYCHANGE:
  82.           InvalidateRect (hwnd, NULL, TRUE) ;
  83.           return 0 ;
  84.  
  85.      case WM_VSCROLL:
  86.           switch (LOWORD (wParam))
  87.           {
  88.           case SB_TOP:            iFont = 0 ;                break ;
  89.           case SB_BOTTOM:         iFont = cFonts - 1 ;       break ;
  90.           case SB_LINEUP:
  91.           case SB_PAGEUP:         iFont -= 1 ;               break ;
  92.           case SB_LINEDOWN:
  93.           case SB_PAGEDOWN:       iFont += 1 ;               break ;
  94.           case SB_THUMBPOSITION:  iFont = HIWORD (wParam) ;  break ;
  95.           }
  96.           iFont = max (0, min (cFonts - 1, iFont)) ;
  97.           SetScrollPos (hwnd, SB_VERT, iFont, TRUE) ;
  98.           InvalidateRect (hwnd, NULL, TRUE) ;
  99.           return 0 ;
  100.  
  101.      case WM_KEYDOWN:
  102.           switch (wParam)
  103.           {
  104.           case VK_HOME: SendMessage (hwnd, WM_VSCROLL, SB_TOP, 0) ;      break ;
  105.           case VK_END:  SendMessage (hwnd, WM_VSCROLL, SB_BOTTOM, 0) ;   break ;
  106.           case VK_PRIOR:
  107.           case VK_LEFT:
  108.           case VK_UP:   SendMessage (hwnd, WM_VSCROLL, SB_LINEUP, 0) ;   break ;
  109.           case VK_NEXT: 
  110.           case VK_RIGHT:
  111.           case VK_DOWN: SendMessage (hwnd, WM_VSCROLL, SB_PAGEDOWN, 0) ; break ;
  112.           }
  113.           return 0 ;
  114.  
  115.      case WM_PAINT:
  116.           hdc = BeginPaint (hwnd, &ps) ;
  117.  
  118.           SelectObject (hdc, GetStockObject (stockfont[iFont].idStockFont)) ;
  119.           GetTextFace (hdc, LF_FACESIZE, szFaceName) ;
  120.           GetTextMetrics (hdc, &tm) ;
  121.           cxGrid = max (3 * tm.tmAveCharWidth, 2 * tm.tmMaxCharWidth) ;
  122.           cyGrid = tm.tmHeight + 3 ;
  123.  
  124.           TextOut (hdc, 0, 0, szBuffer, 
  125.                wsprintf (szBuffer, TEXT (" %s: Face Name = %s, CharSet = %i"),
  126.                          stockfont[iFont].szStockFont, 
  127.                          szFaceName, tm.tmCharSet)) ;
  128.  
  129.           SetTextAlign (hdc, TA_TOP | TA_CENTER) ;
  130.  
  131.                // vertical and horizontal lines
  132.  
  133.           for (i = 0 ; i < 17 ; i++)
  134.           {
  135.                MoveToEx (hdc, (i + 2) * cxGrid,  2 * cyGrid, NULL) ;
  136.                LineTo   (hdc, (i + 2) * cxGrid, 19 * cyGrid) ;
  137.  
  138.                MoveToEx (hdc,      cxGrid, (i + 3) * cyGrid, NULL) ;
  139.                LineTo   (hdc, 18 * cxGrid, (i + 3) * cyGrid) ;
  140.           }
  141.                // vertical and horizontal headings
  142.  
  143.           for (i = 0 ; i < 16 ; i++)
  144.           {
  145.                TextOut (hdc, (2 * i + 5) * cxGrid / 2, 2 * cyGrid + 2, szBuffer,
  146.                     wsprintf (szBuffer, TEXT ("%X-"), i)) ;
  147.  
  148.                TextOut (hdc, 3 * cxGrid / 2, (i + 3) * cyGrid + 2, szBuffer,
  149.                     wsprintf (szBuffer, TEXT ("-%X"), i)) ;
  150.           }
  151.                // characters
  152.  
  153.           for (y = 0 ; y < 16 ; y++)
  154.           for (x = 0 ; x < 16 ; x++)
  155.           {
  156.                TextOut (hdc, (2 * x + 5) * cxGrid / 2, 
  157.                                  (y + 3) * cyGrid + 2, szBuffer,
  158.                     wsprintf (szBuffer, TEXT ("%c"), 16 * x + y)) ;
  159.           }
  160.  
  161.           EndPaint (hwnd, &ps) ;
  162.           return 0 ;
  163.           
  164.      case WM_DESTROY:
  165.           PostQuitMessage (0) ;
  166.           return 0 ;
  167.      }
  168.      return DefWindowProc (hwnd, message, wParam, lParam) ;
  169. }
  170.